home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / Editions.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  15.0 KB  |  619 lines  |  [TEXT/MPS ]

  1. ;
  2. ;    File:        Editions.a
  3. ;
  4. ;    Contains:    Edition Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__EDITIONS__') = 'UNDEFINED' THEN
  21. __EDITIONS__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__MEMORY__') = 'UNDEFINED' THEN
  25.     include 'Memory.a'
  26.     ENDIF
  27. ;        include 'Types.a'                                            ;
  28. ;            include 'ConditionalMacros.a'                            ;
  29. ;        include 'MixedMode.a'                                        ;
  30.  
  31.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  32.     include 'Types.a'
  33.     ENDIF
  34.  
  35.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  36.     include 'Files.a'
  37.     ENDIF
  38. ;        include 'OSUtils.a'                                        ;
  39. ;        include 'Finder.a'                                            ;
  40.  
  41.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  42.     include 'Aliases.a'
  43.     ENDIF
  44. ;        include 'AppleTalk.a'                                        ;
  45.  
  46.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  47.     include 'Dialogs.a'
  48.     ENDIF
  49. ;        include 'Errors.a'                                            ;
  50. ;        include 'Menus.a'                                            ;
  51. ;            include 'Quickdraw.a'                                    ;
  52. ;                include 'QuickdrawText.a'                            ;
  53. ;        include 'Controls.a'                                        ;
  54. ;        include 'Windows.a'                                        ;
  55. ;            include 'Events.a'                                        ;
  56. ;        include 'TextEdit.a'                                        ;
  57.  
  58. ; resource types  
  59. rSectionType                    EQU        'sect'                ; ResType of saved SectionRecords 
  60. ; Finder types for edition files 
  61. kPICTEditionFileType            EQU        'edtp'
  62. kTEXTEditionFileType            EQU        'edtt'
  63. ksndEditionFileType                EQU        'edts'
  64. kUnknownEditionFileType            EQU        'edtu'
  65. kPublisherDocAliasFormat        EQU        'alis'
  66. kPreviewFormat                    EQU        'prvw'
  67. kFormatListFormat                EQU        'fmts'
  68.  
  69. ; section types 
  70. stSubscriber                    EQU        $01
  71. stPublisher                        EQU        $0A
  72. sumAutomatic                    EQU        0                    ; subscriber update mode - Automatically     
  73. sumManual                        EQU        1                    ; subscriber update mode - Manually 
  74. pumOnSave                        EQU        0                    ; publisher update mode - OnSave            
  75. pumManual                        EQU        1                    ; publisher update mode - Manually 
  76. kPartsNotUsed                    EQU        0
  77. kPartNumberUnknown                EQU        -1                    ; misc 
  78. kPreviewWidth                    EQU        120
  79. kPreviewHeight                    EQU        120
  80. ; bits for formatsMask 
  81. kPICTformatMask                    EQU        1
  82. kTEXTformatMask                    EQU        2
  83. ksndFormatMask                    EQU        4
  84. ; pseudo-item hits for dialogHooks 
  85. ; the first if for NewPublisher or NewSubscriber Dialogs 
  86. emHookRedrawPreview                EQU        150
  87. ; the following are for SectionOptions Dialog 
  88. emHookCancelSection                EQU        160
  89. emHookGoToPublisher                EQU        161
  90. emHookGetEditionNow                EQU        162
  91. emHookSendEditionNow            EQU        162
  92. emHookManualUpdateMode            EQU        163
  93. emHookAutoUpdateMode            EQU        164
  94.  
  95. ; the refcon field of the dialog record during a modalfilter 
  96. ; or dialoghook contains one the following 
  97. emOptionsDialogRefCon            EQU        'optn'
  98. emCancelSectionDialogRefCon        EQU        'cncl'
  99. emGoToPubErrDialogRefCon        EQU        'gerr'
  100. kFormatLengthUnknown            EQU        -1
  101.  
  102. ; one byte, stSubscriber or stPublisher 
  103. ; typedef SignedByte         SectionType
  104. ; seconds since 1904 
  105. ; typedef unsigned long     TimeStamp
  106. ; similar to ResType 
  107. ; typedef FourCharCode         FormatType
  108. ; used in Edition I/O 
  109. ; typedef Handle             EditionRefNum
  110. ; update modes 
  111. ; sumAutomatic, pumSuspend, etc 
  112. ; typedef short             UpdateMode
  113. ; typedef struct SectionRecord  SectionRecord
  114. ; typedef SectionRecord     *SectionPtr, **SectionHandle
  115. SectionRecord             RECORD    0
  116. version                     ds.b   1        ; offset: $0 (0)        ; always 0x01 in system 7.0 
  117. kind                     ds.b   1        ; offset: $1 (1)        ; stSubscriber or stPublisher 
  118. mode                     ds.w   1        ; offset: $2 (2)        ; auto or manual 
  119. mdDate                     ds.l   1        ; offset: $4 (4)        ; last change in document 
  120. sectionID                 ds.l   1        ; offset: $8 (8)        ; app. specific, unique per document 
  121. refCon                     ds.l   1        ; offset: $C (12)        ; application specific 
  122. alias                     ds.l   1        ; offset: $10 (16)        ; handle to Alias Record 
  123. subPart                     ds.l   1        ; offset: $14 (20)        ; which part of container file 
  124. nextSection                 ds.l   1        ; offset: $18 (24)        ; for linked list of app's Sections 
  125. controlBlock             ds.l   1        ; offset: $1C (28)        ; used internally 
  126. refNum                     ds.l   1        ; offset: $20 (32)        ; used internally 
  127. sizeof                     EQU *            ; size:   $24 (36)
  128.                         ENDR
  129.  
  130. EditionContainerSpec     RECORD    0
  131. theFile                     ds     FSSpec    ; offset: $0 (0)
  132. theFileScript             ds.w   1        ; offset: $46 (70)
  133. thePart                     ds.l   1        ; offset: $48 (72)
  134. thePartName                 ds.l   8        ; offset: $4C (76)
  135. thePartScript             ds.w   1        ; offset: $6C (108)
  136. sizeof                     EQU *            ; size:   $6E (110)
  137.                         ENDR
  138.  
  139. ; typedef struct EditionContainerSpec  EditionContainerSpec
  140. ; typedef EditionContainerSpec  *EditionContainerSpecPtr
  141. EditionInfoRecord         RECORD    0
  142. crDate                     ds.l   1        ; offset: $0 (0)        ; date EditionContainer was created 
  143. mdDate                     ds.l   1        ; offset: $4 (4)        ; date of last change 
  144. fdCreator                 ds.l   1        ; offset: $8 (8)        ; file creator 
  145. fdType                     ds.l   1        ; offset: $C (12)        ; file type 
  146. container                 ds     EditionContainerSpec ; offset: $10 (16) ; the Edition 
  147. sizeof                     EQU *            ; size:   $7E (126)
  148.                         ENDR
  149.  
  150. ; typedef struct EditionInfoRecord  EditionInfoRecord
  151. NewPublisherReply         RECORD    0
  152. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  153. replacing                 ds.b   1        ; offset: $1 (1)
  154. usePart                     ds.b   1        ; offset: $2 (2)        ; I 
  155. filler                     ds.b   1        ; offset: $3 (3)
  156. preview                     ds.l   1        ; offset: $4 (4)        ; I 
  157. previewFormat             ds.l   1        ; offset: $8 (8)        ; I 
  158. container                 ds     EditionContainerSpec ; offset: $C (12) ; I/O 
  159. sizeof                     EQU *            ; size:   $7A (122)
  160.                         ENDR
  161.  
  162. ; typedef struct NewPublisherReply  NewPublisherReply
  163. NewSubscriberReply         RECORD    0
  164. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  165. formatsMask                 ds.b   1        ; offset: $1 (1)
  166. container                 ds     EditionContainerSpec ; offset: $2 (2) ;I/O
  167. sizeof                     EQU *            ; size:   $70 (112)
  168.                         ENDR
  169.  
  170. ; typedef struct NewSubscriberReply  NewSubscriberReply
  171. SectionOptionsReply     RECORD    0
  172. canceled                 ds.b   1        ; offset: $0 (0)        ; O 
  173. changed                     ds.b   1        ; offset: $1 (1)        ; O 
  174. sectionH                 ds.l   1        ; offset: $2 (2)        ; I 
  175. action                     ds.l   1        ; offset: $6 (6)        ; O 
  176. sizeof                     EQU *            ; size:   $A (10)
  177.                         ENDR
  178.  
  179. ; typedef struct SectionOptionsReply  SectionOptionsReply
  180.  
  181. ioHasFormat                        EQU        0
  182. ioReadFormat                    EQU        1
  183. ioNewFormat                        EQU        2
  184. ioWriteFormat                    EQU        3
  185.  
  186. ; typedef SignedByte         FormatIOVerb
  187.  
  188. eoOpen                            EQU        0
  189. eoClose                            EQU        1
  190. eoOpenNew                        EQU        2
  191. eoCloseNew                        EQU        3
  192. eoCanSubscribe                    EQU        4
  193.  
  194. ; typedef SignedByte         EditionOpenerVerb
  195. FormatIOParamBlock         RECORD    0
  196. ioRefNum                 ds.l   1        ; offset: $0 (0)
  197. format                     ds.l   1        ; offset: $4 (4)
  198. formatIndex                 ds.l   1        ; offset: $8 (8)
  199. offset                     ds.l   1        ; offset: $C (12)
  200. buffPtr                     ds.l   1        ; offset: $10 (16)
  201. buffLen                     ds.l   1        ; offset: $14 (20)
  202. sizeof                     EQU *            ; size:   $18 (24)
  203.                         ENDR
  204.  
  205. ; typedef struct FormatIOParamBlock  FormatIOParamBlock
  206. ; typedef struct EditionOpenerParamBlock  EditionOpenerParamBlock
  207. EditionOpenerParamBlock RECORD    0
  208. info                     ds     EditionInfoRecord ; offset: $0 (0)
  209. sectionH                 ds.l   1        ; offset: $7E (126)
  210. document                 ds.l   1        ; offset: $82 (130)
  211. fdCreator                 ds.l   1        ; offset: $86 (134)
  212. ioRefNum                 ds.l   1        ; offset: $8A (138)
  213. ioProc                     ds.l   1        ; offset: $8E (142)
  214. success                     ds.b   1        ; offset: $92 (146)
  215. formatsMask                 ds.b   1        ; offset: $93 (147)
  216. sizeof                     EQU *            ; size:   $94 (148)
  217.                         ENDR
  218.  
  219.  
  220. sectionEventMsgClass            EQU        'sect'
  221. sectionReadMsgID                EQU        'read'
  222. sectionWriteMsgID                EQU        'writ'
  223. sectionScrollMsgID                EQU        'scrl'
  224. sectionCancelMsgID                EQU        'cncl'
  225.  
  226. currentEditionMgrVers            EQU        $0011
  227.  
  228. ;
  229. ; pascal OSErr InitEditionPackVersion(short curEditionMgrVers)
  230. ;
  231.     IF ¬ GENERATINGCFM THEN
  232.         Macro
  233.         _InitEditionPackVersion
  234.             move.w    #$0100,d0
  235.             dc.w     $A82D
  236.         EndM
  237.     ELSE
  238.         IMPORT_CFM_FUNCTION    InitEditionPackVersion
  239.     ENDIF
  240.  
  241. ;
  242. ; pascal OSErr NewSection(const EditionContainerSpec *container, ConstFSSpecPtr sectionDocument, SectionType kind, long sectionID, UpdateMode initalMode, SectionHandle *sectionH)
  243. ;
  244.     IF ¬ GENERATINGCFM THEN
  245.         Macro
  246.         _NewSection
  247.             move.w    #$0A02,d0
  248.             dc.w     $A82D
  249.         EndM
  250.     ELSE
  251.         IMPORT_CFM_FUNCTION    NewSection
  252.     ENDIF
  253.  
  254. ;
  255. ; pascal OSErr RegisterSection(const FSSpec *sectionDocument, SectionHandle sectionH, Boolean *aliasWasUpdated)
  256. ;
  257.     IF ¬ GENERATINGCFM THEN
  258.         Macro
  259.         _RegisterSection
  260.             move.w    #$0604,d0
  261.             dc.w     $A82D
  262.         EndM
  263.     ELSE
  264.         IMPORT_CFM_FUNCTION    RegisterSection
  265.     ENDIF
  266.  
  267. ;
  268. ; pascal OSErr UnRegisterSection(SectionHandle sectionH)
  269. ;
  270.     IF ¬ GENERATINGCFM THEN
  271.         Macro
  272.         _UnRegisterSection
  273.             move.w    #$0206,d0
  274.             dc.w     $A82D
  275.         EndM
  276.     ELSE
  277.         IMPORT_CFM_FUNCTION    UnRegisterSection
  278.     ENDIF
  279.  
  280. ;
  281. ; pascal OSErr IsRegisteredSection(SectionHandle sectionH)
  282. ;
  283.     IF ¬ GENERATINGCFM THEN
  284.         Macro
  285.         _IsRegisteredSection
  286.             move.w    #$0208,d0
  287.             dc.w     $A82D
  288.         EndM
  289.     ELSE
  290.         IMPORT_CFM_FUNCTION    IsRegisteredSection
  291.     ENDIF
  292.  
  293. ;
  294. ; pascal OSErr AssociateSection(SectionHandle sectionH, const FSSpec *newSectionDocument)
  295. ;
  296.     IF ¬ GENERATINGCFM THEN
  297.         Macro
  298.         _AssociateSection
  299.             move.w    #$040C,d0
  300.             dc.w     $A82D
  301.         EndM
  302.     ELSE
  303.         IMPORT_CFM_FUNCTION    AssociateSection
  304.     ENDIF
  305.  
  306. ;
  307. ; pascal OSErr CreateEditionContainerFile(const FSSpec *editionFile, OSType fdCreator, ScriptCode editionFileNameScript)
  308. ;
  309.     IF ¬ GENERATINGCFM THEN
  310.         Macro
  311.         _CreateEditionContainerFile
  312.             move.w    #$050E,d0
  313.             dc.w     $A82D
  314.         EndM
  315.     ELSE
  316.         IMPORT_CFM_FUNCTION    CreateEditionContainerFile
  317.     ENDIF
  318.  
  319. ;
  320. ; pascal OSErr DeleteEditionContainerFile(const FSSpec *editionFile)
  321. ;
  322.     IF ¬ GENERATINGCFM THEN
  323.         Macro
  324.         _DeleteEditionContainerFile
  325.             move.w    #$0210,d0
  326.             dc.w     $A82D
  327.         EndM
  328.     ELSE
  329.         IMPORT_CFM_FUNCTION    DeleteEditionContainerFile
  330.     ENDIF
  331.  
  332. ;
  333. ; pascal OSErr OpenEdition(SectionHandle subscriberSectionH, EditionRefNum *refNum)
  334. ;
  335.     IF ¬ GENERATINGCFM THEN
  336.         Macro
  337.         _OpenEdition
  338.             move.w    #$0412,d0
  339.             dc.w     $A82D
  340.         EndM
  341.     ELSE
  342.         IMPORT_CFM_FUNCTION    OpenEdition
  343.     ENDIF
  344.  
  345. ;
  346. ; pascal OSErr OpenNewEdition(SectionHandle publisherSectionH, OSType fdCreator, ConstFSSpecPtr publisherSectionDocument, EditionRefNum *refNum)
  347. ;
  348.     IF ¬ GENERATINGCFM THEN
  349.         Macro
  350.         _OpenNewEdition
  351.             move.w    #$0814,d0
  352.             dc.w     $A82D
  353.         EndM
  354.     ELSE
  355.         IMPORT_CFM_FUNCTION    OpenNewEdition
  356.     ENDIF
  357.  
  358. ;
  359. ; pascal OSErr CloseEdition(EditionRefNum whichEdition, Boolean successful)
  360. ;
  361.     IF ¬ GENERATINGCFM THEN
  362.         Macro
  363.         _CloseEdition
  364.             move.w    #$0316,d0
  365.             dc.w     $A82D
  366.         EndM
  367.     ELSE
  368.         IMPORT_CFM_FUNCTION    CloseEdition
  369.     ENDIF
  370.  
  371. ;
  372. ; pascal OSErr EditionHasFormat(EditionRefNum whichEdition, FormatType whichFormat, Size *formatSize)
  373. ;
  374.     IF ¬ GENERATINGCFM THEN
  375.         Macro
  376.         _EditionHasFormat
  377.             move.w    #$0618,d0
  378.             dc.w     $A82D
  379.         EndM
  380.     ELSE
  381.         IMPORT_CFM_FUNCTION    EditionHasFormat
  382.     ENDIF
  383.  
  384. ;
  385. ; pascal OSErr ReadEdition(EditionRefNum whichEdition, FormatType whichFormat, void *buffPtr, Size *buffLen)
  386. ;
  387.     IF ¬ GENERATINGCFM THEN
  388.         Macro
  389.         _ReadEdition
  390.             move.w    #$081A,d0
  391.             dc.w     $A82D
  392.         EndM
  393.     ELSE
  394.         IMPORT_CFM_FUNCTION    ReadEdition
  395.     ENDIF
  396.  
  397. ;
  398. ; pascal OSErr WriteEdition(EditionRefNum whichEdition, FormatType whichFormat, const void *buffPtr, Size buffLen)
  399. ;
  400.     IF ¬ GENERATINGCFM THEN
  401.         Macro
  402.         _WriteEdition
  403.             move.w    #$081C,d0
  404.             dc.w     $A82D
  405.         EndM
  406.     ELSE
  407.         IMPORT_CFM_FUNCTION    WriteEdition
  408.     ENDIF
  409.  
  410. ;
  411. ; pascal OSErr GetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long *currentMark)
  412. ;
  413.     IF ¬ GENERATINGCFM THEN
  414.         Macro
  415.         _GetEditionFormatMark
  416.             move.w    #$061E,d0
  417.             dc.w     $A82D
  418.         EndM
  419.     ELSE
  420.         IMPORT_CFM_FUNCTION    GetEditionFormatMark
  421.     ENDIF
  422.  
  423. ;
  424. ; pascal OSErr SetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long setMarkTo)
  425. ;
  426.     IF ¬ GENERATINGCFM THEN
  427.         Macro
  428.         _SetEditionFormatMark
  429.             move.w    #$0620,d0
  430.             dc.w     $A82D
  431.         EndM
  432.     ELSE
  433.         IMPORT_CFM_FUNCTION    SetEditionFormatMark
  434.     ENDIF
  435.  
  436. ;
  437. ; pascal OSErr GetEditionInfo(SectionHandle sectionH, EditionInfoRecord *editionInfo)
  438. ;
  439.     IF ¬ GENERATINGCFM THEN
  440.         Macro
  441.         _GetEditionInfo
  442.             move.w    #$0422,d0
  443.             dc.w     $A82D
  444.         EndM
  445.     ELSE
  446.         IMPORT_CFM_FUNCTION    GetEditionInfo
  447.     ENDIF
  448.  
  449. ;
  450. ; pascal OSErr GoToPublisherSection(const EditionContainerSpec *container)
  451. ;
  452.     IF ¬ GENERATINGCFM THEN
  453.         Macro
  454.         _GoToPublisherSection
  455.             move.w    #$0224,d0
  456.             dc.w     $A82D
  457.         EndM
  458.     ELSE
  459.         IMPORT_CFM_FUNCTION    GoToPublisherSection
  460.     ENDIF
  461.  
  462. ;
  463. ; pascal OSErr GetLastEditionContainerUsed(EditionContainerSpec *container)
  464. ;
  465.     IF ¬ GENERATINGCFM THEN
  466.         Macro
  467.         _GetLastEditionContainerUsed
  468.             move.w    #$0226,d0
  469.             dc.w     $A82D
  470.         EndM
  471.     ELSE
  472.         IMPORT_CFM_FUNCTION    GetLastEditionContainerUsed
  473.     ENDIF
  474.  
  475. ;
  476. ; pascal OSErr GetStandardFormats(const EditionContainerSpec *container, FormatType *previewFormat, Handle preview, Handle publisherAlias, Handle formats)
  477. ;
  478.     IF ¬ GENERATINGCFM THEN
  479.         Macro
  480.         _GetStandardFormats
  481.             move.w    #$0A28,d0
  482.             dc.w     $A82D
  483.         EndM
  484.     ELSE
  485.         IMPORT_CFM_FUNCTION    GetStandardFormats
  486.     ENDIF
  487.  
  488. ;
  489. ; pascal OSErr GetEditionOpenerProc(EditionOpenerUPP *opener)
  490. ;
  491.     IF ¬ GENERATINGCFM THEN
  492.         Macro
  493.         _GetEditionOpenerProc
  494.             move.w    #$022A,d0
  495.             dc.w     $A82D
  496.         EndM
  497.     ELSE
  498.         IMPORT_CFM_FUNCTION    GetEditionOpenerProc
  499.     ENDIF
  500.  
  501. ;
  502. ; pascal OSErr SetEditionOpenerProc(EditionOpenerUPP opener)
  503. ;
  504.     IF ¬ GENERATINGCFM THEN
  505.         Macro
  506.         _SetEditionOpenerProc
  507.             move.w    #$022C,d0
  508.             dc.w     $A82D
  509.         EndM
  510.     ELSE
  511.         IMPORT_CFM_FUNCTION    SetEditionOpenerProc
  512.     ENDIF
  513.  
  514. ;
  515. ; pascal OSErr CallEditionOpenerProc(EditionOpenerVerb selector, EditionOpenerParamBlock *PB, EditionOpenerUPP routine)
  516. ;
  517.     IF ¬ GENERATINGCFM THEN
  518.         Macro
  519.         _CallEditionOpenerProc
  520.             move.w    #$052E,d0
  521.             dc.w     $A82D
  522.         EndM
  523.     ELSE
  524.         IMPORT_CFM_FUNCTION    CallEditionOpenerProc
  525.     ENDIF
  526.  
  527. ;
  528. ; pascal OSErr CallFormatIOProc(FormatIOVerb selector, FormatIOParamBlock *PB, FormatIOUPP routine)
  529. ;
  530.     IF ¬ GENERATINGCFM THEN
  531.         Macro
  532.         _CallFormatIOProc
  533.             move.w    #$0530,d0
  534.             dc.w     $A82D
  535.         EndM
  536.     ELSE
  537.         IMPORT_CFM_FUNCTION    CallFormatIOProc
  538.     ENDIF
  539.  
  540. ;
  541. ; pascal OSErr NewSubscriberDialog(NewSubscriberReply *reply)
  542. ;
  543.     IF ¬ GENERATINGCFM THEN
  544.         Macro
  545.         _NewSubscriberDialog
  546.             move.w    #$0232,d0
  547.             dc.w     $A82D
  548.         EndM
  549.     ELSE
  550.         IMPORT_CFM_FUNCTION    NewSubscriberDialog
  551.     ENDIF
  552.  
  553. ;
  554. ; pascal OSErr NewSubscriberExpDialog(NewSubscriberReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  555. ;
  556.     IF ¬ GENERATINGCFM THEN
  557.         Macro
  558.         _NewSubscriberExpDialog
  559.             move.w    #$0B34,d0
  560.             dc.w     $A82D
  561.         EndM
  562.     ELSE
  563.         IMPORT_CFM_FUNCTION    NewSubscriberExpDialog
  564.     ENDIF
  565.  
  566. ;
  567. ; pascal OSErr NewPublisherDialog(NewPublisherReply *reply)
  568. ;
  569.     IF ¬ GENERATINGCFM THEN
  570.         Macro
  571.         _NewPublisherDialog
  572.             move.w    #$0236,d0
  573.             dc.w     $A82D
  574.         EndM
  575.     ELSE
  576.         IMPORT_CFM_FUNCTION    NewPublisherDialog
  577.     ENDIF
  578.  
  579. ;
  580. ; pascal OSErr NewPublisherExpDialog(NewPublisherReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  581. ;
  582.     IF ¬ GENERATINGCFM THEN
  583.         Macro
  584.         _NewPublisherExpDialog
  585.             move.w    #$0B38,d0
  586.             dc.w     $A82D
  587.         EndM
  588.     ELSE
  589.         IMPORT_CFM_FUNCTION    NewPublisherExpDialog
  590.     ENDIF
  591.  
  592. ;
  593. ; pascal OSErr SectionOptionsDialog(SectionOptionsReply *reply)
  594. ;
  595.     IF ¬ GENERATINGCFM THEN
  596.         Macro
  597.         _SectionOptionsDialog
  598.             move.w    #$023A,d0
  599.             dc.w     $A82D
  600.         EndM
  601.     ELSE
  602.         IMPORT_CFM_FUNCTION    SectionOptionsDialog
  603.     ENDIF
  604.  
  605. ;
  606. ; pascal OSErr SectionOptionsExpDialog(SectionOptionsReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  607. ;
  608.     IF ¬ GENERATINGCFM THEN
  609.         Macro
  610.         _SectionOptionsExpDialog
  611.             move.w    #$0B3C,d0
  612.             dc.w     $A82D
  613.         EndM
  614.     ELSE
  615.         IMPORT_CFM_FUNCTION    SectionOptionsExpDialog
  616.     ENDIF
  617.  
  618.     ENDIF ; __EDITIONS__
  619.